<script>on mouseUpsplashMe ShareSplash -- noshareend mouseUpon splashMe bigsplashglobal iSawThePictureif iSawThePicture is empty thenput the visible of msg into msgVishide msgpicture bigSplash,resource,rect,true,8repeat 7if the mouseClick then exit repeatwait 1 secend repeatclose window bigSplashset the visible of msg to msgVisput "Indeed" into iSawThePicturelock screencleanUpstopPunchend ifend splashMe</script>
</part>
<part>
<id>14</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>4</left>
<top>22</top>
<right>36</right>
<bottom>35</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Start</name>
<script></script>
</part>
<part>
<id>15</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>4</left>
<top>38</top>
<right>36</right>
<bottom>51</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>End</name>
<script></script>
</part>
<part>
<id>16</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>38</left>
<top>35</top>
<right>175</right>
<bottom>68</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name></name>
<script>on mouseDownif the visible of fld "TasksField" then exit mouseDownset highlight of bg button "End" to trueif line 4 of fld "JobInfo" is not empty thenbeepanswer "You must restart this job before stopping it."set highlight of bg button "End" to falseexit mouseDownend ifif line 2 of fld "JobInfo" is empty thenbeepanswer "You must start a job before stopping it."set highlight of bg button "End" to falseexit mouseDownend ifput line 2 of fld "JobInfo" into starterput starter into startCheckconvert startCheck to secsconvert starter to secsput the short time & return & "Enter Time" into pickedJobFullput item 1 of rect of the target + 1 & "," into TheMenuLocput item 2 of rect of the target + 4 after TheMenuLocput popUpMenu(pickedJobFull,TheMenuLoc,,"Geneva","9") into pickedJobHoldput line 1 of pickedJobHold into convertEndif convertEnd is empty thenset highlight of bg button "End" to falseput "Open" into line 3 of fld "jobInfo"exit mouseDownend ifif convertEnd is "Enter Time" thenask "What time did you finish the job?" with the short timeif it is "Open" thenbeepanswer quote & "Open" & quote && "is an invalid end time, please re-enter."set highlight of bg btn "End" to falseexit mouseDownend ifif it is empty thenset highlight of bg button "End" to falseexit mouseDownelseput it into convertEndend ifconvert it to secsif the result is not empty thenbeepanswer "Not a valid time. Please re-enter."set highlight of bg btn "End" to falseexit mouseDownend ifend ifput convertEnd into enderput ender into endCheckconvert endCheck to secsif startCheck > endCheck thenanswer "Oops, your end time is before your start time!"put "Open" into line 3 of fld "jobInfo"set highlight of bg button "End" to falseexit mouseDownend ifconvert ender to short timeput ender into line 3 of fld "jobInfo"taskTagput ender into fld "PrevEndTime"end mouseDown</script>
<script>on mouseDownif the visible of fld "TasksField" then exit mouseDownglobal codeCheckput "true" into codeCheckset highlight of bg button "Job" to trueput empty into finditput 2 into gotOneif line 2 of fld "JobInfo" is empty and line 1 of fld "JobInfo" is not empty thenput fld id 60 into gotOneif gotOne is empty thenput 2 into gotOneend ifelseif line 3 of fld "jobInfo" is "Open" thenanswer "You already have a job started. Please stop it or cancel it before opening another job. Option-click" & ¬" on the start line to cancel or choose ‘Cancel Job’ from the TimeBook menu."set highlight of bg button "Job" to falseexit mouseDownend ifend ifput "New Job" & return & fld id 39 & "Clear Job List" into pickedJobFullput item 1 of rect of the target + 1 & "," into TheMenuLocput item 2 of rect of the target + 3 after TheMenuLocput popUpMenu(pickedJobFull,TheMenuLoc,gotOne,"Geneva","9") into pickedJobHoldput line 1 of pickedJobHold into pickedJobput line 2 of pickedJobHold into fld id 60if pickedJob is "New Job" thenput empty into fld "JobInfo"clientCodeif codeCheck is "false" thenset the highLight of bg button "Job" to falseexit mouseDownend ifput line 1 of fld "JobInfo" into pickedJobend ifif pickedJob is "Clear Job List" thenanswer "Are you sure you want to clear your job list" with "OK" or "Cancel"if it is "OK" thenput empty into fld id 39put empty into line 1 to 4 of fld "JobInfo"set highlight of bg button "Job" to falseexit mouseDownend ifend ifput character 1 to 34 of pickedJob into line 1 of fld "JobInfo"put empty into line 2 to 4 of fld "JobInfo"set highlight of bg button "Job" to falseend mouseDownon checkForFourget line 1 of fld "jobInfo"put offset(" ",it) into holdFourif holdFour = 9 thenput "0" after character 5 of line 1 of fld "jobInfo"end ifend checkForFour</script>
</part>
<part>
<id>23</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>35</left>
<top>18</top>
<right>175</right>
<bottom>33</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>PrevEndTime</name>
<script></script>
</part>
<part>
<id>27</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>4</left>
<top>54</top>
<right>36</right>
<bottom>67</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Task</name>
<script></script>
</part>
<part>
<id>37</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>2</top>
<right>175</right>
<bottom>21</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>DateHolder</name>
<script></script>
</part>
<part>
<id>47</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>53</top>
<right>36</right>
<bottom>68</bottom>
</rect>
<style>opaque</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>New York</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>CodeButton</name>
<script></script>
</part>
<part>
<id>44</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>5</top>
<right>175</right>
<bottom>67</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Clients</name>
<script></script>
</part>
<part>
<id>45</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>38</left>
<top>53</top>
<right>175</right>
<bottom>67</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ClientField</name>
<script>on mouseDownglobal jobNumerals,clientNumeralsset highlight of bg button id 46 to trueput empty into fld "ClientField"put fld id 44 into clientListput item 1 of rect of the target +1 & "," into TheMenuLocput item 2 of rect of the target after TheMenuLocput popUpMenu(clientList,TheMenuLoc,,"Geneva","9") into clientTempput line 1 of clientTemp into pickedClientif pickedClient is empty thenset highlight of bg button id 46 to falsehide fld "CodeButton"hide fld "ClientField"put empty into line 1 of fld "jobInfo"exit mouseDownend ifput last word of pickedClient into clientHoldput "-" & word 1 of clientHold after line 1 of fld "JobInfo"set highlight of bg button id 46 to falsehide fld "ClientField"hide fld "CodeButton"if fld id 39 is not empty thenif clientNumerals = 0 then put 0 into addSpaceelse put 1 into addSpaceput character 1 to (clientNumerals + jobNumerals + addSpace) of line 1 of fld "JobInfo" into numbTempif jobNumerals = "0" then put line 1 of fld "JobInfo" into numbTempfind numbTemp in fld id 39if the result is empty thenanswer "You already have a job with that number in your job list"put empty into line 1 of fld "JobInfo"put the value of the foundLine into line 1 of fld "JobInfo"set the highLight of bg button "Job" to falseexit mouseDownend ifend iflock screenaddJobNameunlock screenend mouseDown</script>
</part>
<part>
<id>50</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>2</top>
<right>176</right>
<bottom>65</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TasksScroll</name>
<script></script>
</part>
<part>
<id>60</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>35</left>
<top>4</top>
<right>175</right>
<bottom>20</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>HideNumber</name>
<script></script>
</part>
<part>
<id>61</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>5</top>
<right>175</right>
<bottom>67</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Billing Categories</name>
<script></script>
</part>
<part>
<id>39</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>5</top>
<right>175</right>
<bottom>67</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Jobs</name>
<script></script>
</part>
<part>
<id>26</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>38</left>
<top>53</top>
<right>175</right>
<bottom>67</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TasksField</name>
<script>on mouseDownglobal commentsOnput empty into fld "TasksField"put item 1 of rect of the target + 1 & "," into TheMenuLocput item 2 of rect of the target + 1 after TheMenuLocif the highlight of bg btn id 27 and commentsOn is true thenset the highlight of bg btn id 46 to trueput "New" & return & "(C0) No comment" & return & fld "Comments" into commentListput popUpMenu (commentList,TheMenuLoc,2,geneva,9) into commentTempput line 1 of commentTemp into pickedCommentif pickedComment is empty thenset highlight of bg btn id 27 to falseset highlight of bg btn "End" to falsehide fld "TasksField"hide fld "CodeButton"put "Open" into line 3 of fld "jobInfo"set the highlight of bg btn id 46 to falseput empty into line 4 of fld "JobInfo"exit mouseDownend ifif pickedComment is "New" thenask "Enter comment for " & line 1 of fld "JobInfo" & "…"if the result is cancel thenset highlight of bg btn id 27 to falseset highlight of bg btn "End" to falseput "Open" into line 3 of fld "jobInfo"set the highlight of bg btn id 46 to falseput empty into line 4 of fld "JobInfo"hide fld "TasksField"hide fld "CodeButton"exit mouseDownend ifif char 1 to 2 of it is "(C" thendelete char 1 to offset(")",it) + 1 of itend ifrepeat with x = 1 to (the number of chars of it)if char x of it is "," then put "/" into char x of itend repeatput (char 3 to (the number of chars of word 1 of the last line of fld "Comments" - 1) of the last line of fld "Comments") + 1 into nextComput "(C" & nextCom & ")" && it & return after fld "Comments"put word 1 of the last line of fld "Comments" into holdCommentelseput word 1 of pickedComment into holdCommentend iflock screenhide fld "TasksField"hide fld "CodeButton"set highlight of bg button id 27 to falseset the highlight of bg btn id 46 to falseunlock screenset cursor to watchupdateDayList holdCommentexit mouseDownend ifset highlight of bg button id 27 to trueset highlight of bg btn "End" to falseif the optionKey is down thenput fld "TasksScroll" into tasksListput popUpMenu (tasksList,theMenuLoc,20,geneva,9) into tasksTempelseput fld id 61 into tasksListput popUpMenu (tasksList,theMenuLoc,,geneva,9) into tasksTempend ifput line 1 of tasksTemp into pickedTaskif pickedTask is empty thenset highlight of bg btn id 27 to falseset highlight of bg btn "End" to falsehide fld "TasksField"put "Open" into line 3 of fld "jobInfo"unlock screenexit mouseDownend ifput word 1 of pickedTask into line 4 of fld "JobInfo"if the commandKey is not down and commentsOn is true thenput "Com" into fld "CodeButton"show fld "CodeButton"put "Click Here to Enter Comment." into fld "TasksField"show fld "TasksField"exit mouseDownend ifif the commandKey is down then put "(C0)" into holdCommentset highlight of bg button id 27 to falsehide fld "TasksField"set cursor to watchupdateDayList holdCommentend mouseDown</script>
</part>
<part>
<id>66</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>4</left>
<top>6</top>
<right>36</right>
<bottom>19</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>The Job</name>
<script>on mouseUpend mouseUp</script>
</part>
<part>
<id>65</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>5</top>
<right>175</right>
<bottom>67</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Comments</name>
<script></script>
</part>
<part>
<id>67</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>176</left>
<top>52</top>
<right>189</right>
<bottom>67</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>18718</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Billing CategoriesList</name>
<script>on mouseUpif the highLight of me then sort fld id 61if the optionKey is down then put "down" into isOptionDownset the highlight of bg btn id 68 to falseset the highlight of bg btn id 69 to falseset the highlight of me to truelock screenset the visible of fld "Jobs" to falseset the visible of fld "Clients" to falseset the checkMark of menuItem "Edit Jobs" of menu "TimeBook" to falseset the checkMark of menuItem "Edit Clients" of menu "TimeBook" to falseeditIt (the id of fld "Billing Categories"),isOptionDownif not the visible of fld "Billing Categories" then set the highlight of me to falseend mouseUp</script>
</part>
<part>
<id>68</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>176</left>
<top>36</top>
<right>189</right>
<bottom>51</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>18717</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>ClientsList</name>
<script>on mouseUpif the optionKey is down then put "down" into isOptionDownset the highlight of bg btn id 67 to falseset the highlight of bg btn id 69 to falseset the highlight of me to truelock screenset the visible of fld "Jobs" to falseset the visible of fld "Billing Categories" to falseset the checkMark of menuItem "Edit Jobs" of menu "TimeBook" to falseset the checkMark of menuItem "Edit Billing Categories" of menu "TimeBook" to falseeditIt (the id of fld "Clients"),isOptionDownif not the visible of fld "Clients" then set the highlight of me to falseend mouseUp</script>
</part>
<part>
<id>69</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>176</left>
<top>20</top>
<right>189</right>
<bottom>35</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <false /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>18716</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>JobsList</name>
<script>on mouseUpif the optionKey is down then put "down" into isOptionDownset the highlight of bg btn id 67 to falseset the highlight of bg btn id 68 to falseset the highlight of me to truelock screenset the visible of fld "Clients" to falseset the visible of fld "Billing Categories" to falseset the checkMark of menuItem "Edit Clients" of menu "TimeBook" to falseset the checkMark of menuItem "Edit Billing Categories" of menu "TimeBook" to falseeditIt (the id of fld "Jobs"),isOptionDownif not the visible of fld "Jobs" then set the highlight of me to falseend mouseUp</script>
</part>
<part>
<id>70</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>176</left>
<top>3</top>
<right>189</right>
<bottom>20</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>25579</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseUpglobal versionNumberset cursor to watchset lockMessages to trueif the highlight of bg btn id 69 then send mouseUp to bg btn id 69if the highlight of bg btn id 68 then send mouseUp to bg btn id 68if the highlight of bg btn id 67 then send mouseUp to bg btn id 67put word 2 of the short name of this stack into versionNumbergoLogicend mouseUp</script>
</part>
<part>
<id>71</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <true /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>2</left>
<top>20</top>
<right>175</right>
<bottom>39</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>WeekHolder</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>47</id>
<text>Com</text>
</content>
<content>
<layer>background</layer>
<id>44</id>
<text>Advd Communication Design 059Alb Collegiate Interfaith Ctr 006Amer Payroll Network 063Benfanti Design Group 020Bruce Matt 079Capital Cablevision 005Carpet Factory Outlet 008CBS Records 049CEI Inc 064Concordia College 007D.Schmidt 067Fluorglas 010Food Enterprise 041Friendly Home Parties 080GE Plastics 088GlenMonitor USA 013Glennpeter Jewlers 014Great American 027HBO 004Hermal Pharmeceutical 089Hollywood Records 084Insulating Materials 090King Fuels 015Lady Americana 077Logicware 037Margold 029Mark III 017Media Logic 099Mercari Group 078Metroland Photo 028Michaels Group 085MICO 073Mohawk Carpets 075Movies Plus 076Moyse and Associates 018Murphy Productions 069Natl Baseball Hall of Fame 091New Art Printing 081Otesaga Hotel and Cooper Inn 086Our Town Television 060Prescott Woods 071Price Chopper Books 011RPI 098Sound Logic Outside Clients 050Specialty Silicone Products 087State Board of Elections 030Stevens and Thompson Paper 082The Editing Room 009Town of Colonie Police Dept 066Tropical Records 039Troy Mattress Company 056TWM-BH 002TWM-GA 001White Management 074</text>
</content>
<content>
<layer>background</layer>
<id>50</id>
<text>000 Lunch/Personal005 Client Contact010 Acct Management015 Market Research020 Copy025 Copy-Client Rev030 Creative Develop035 Client Approval040 Admin Client045 Media Research050 Media Planning052 Media Trafficking055 Media Buying060 Media Auditing065 Pub Relation/Client070 Travel Time075 Quotes110 Production Suprvsn115 Proofing118 Illustration120 Design125 Design-Client Rev130 Mechanicals132 Agency Errors136 Mech-Client Rev160 Brodcst Production170 Photostyling175 Store Design180 Design Library185 Design Specifier250 Adm Shipping295 SL Voice Tallent296 Studio Production300 New Business305 Agency Self Promo306 Interior Design ML310 Staff Meeting314 Administrative SL315 Administration316 Computer Admin320 Personal/Sick325 Vacation330 Leave of Absence332 Jury Duty335 Holiday345 Bereavement Leave381 Recruitment393 Dubs/Tep394 Packing</text>
(CDRM1080320)(1993).iso/FILES/APP/S-Z/TimeBook2.0.sit/TimeClock 2.0/BMAP_2188.png){kind=link}